SetTextJustify procedure

  DECLARATION:  SetTextJustify(Horiz, Vert : Word);

      PURPOSE:  Sets the text justification values used by OutText and
                OutTextXY

         UNIT:  Graph

      REMARKS:  Text output after a call to SetTextJustify will be justified
                around the Current Pointer (CP) in the manner specified.  The
                following constants are declared in the Graph unit.

                            Const
                               LeftText    = 0;
                               CenterText  = 1;
                               RightText   = 2;
                               BottomText  = 0;
                               CenterText  = 1;  { already declared above }
                               TopText     = 2;

 RESTRICTIONS:  Must first be in graphics mode.